# Load necessary libraries

# Prepare datasets
# Trait data (columns 2:9)
setwd("C://Users/rober/OneDrive/Documents/Thicket/raw data")
new.d <- read.csv("13_TraitData.csv")
new.d <- new.d[,-1]

# Drought outcome dataset(s)
mean_damage_df.1 <- read.csv("DamageS1.csv")
mean_damage_df.2 <- read.csv("DamageS2.csv")
